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ABSTRACT 
DEMJA Lm CONTIGUOUS MEMORY ADDRE 


eae eewears 


REQUIREMENTS 
EQUIPMENT 
POP-11/70 FAMILY PROCESSOR WITH 32K MEMORY 


STORAGE 
PROGRAM STORAGE - THE PROGRAM USES MEMORY 0-17777 


PRELIMINARY PROGRAMS 
DEKBA THROUGH DEKBF 


LEN SE TIE CREE cs woe 


SET Peace tone IN DESIRED POSITION (SEE SEC 4.0) 

ASTERISK“ ee MILL, BE ge Ral AFTER EACH 

PRON IOR aI TSE Th 2 ficnar masse, 
RESTORE THE LOADERS, RESTART AT lée. 

ACT11 OPERATION 


IF THE PROGRAM IS RUN IN QU 
PROGRAM IS DONE AFTER THE F 


SWITCH SETTINGS 
ROTE IF SW1S=i WHEN AN 0c HE PROGRAM WILL 
HALT. AND Fite BATA i SOT Be” LOADED INTO coe 

PROGRAM WIL T WHEN THE 
COMPLETES, AND THE CORRECT DATA WILL BE NLOADED AYO 
THE ERIE EAC ADDRESS . 
SW14 = l OR | LOOP SUBTEST 
SW13 = 1 OR UP..... INHIBIT ERROR TYPEOUT 
SWl2 = 1 OR UP....INHIBIT USE OF MEMORY MANAGEMENT 
NOTE: INHIBITING THE USE OF MEMORY Y MANAGEMENT CAN 
DONE ONLY WHEN 


BE THE PROGRAM IS STARTED. 
IF THE USE OF MEMORY MANAGEMENT IS INHIBITED THE LAST 


ICK_VERIFY MODE UNDER ACT11 THE 
IRST PASS. 
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—§.0 


6.0 


6.1 


ADDRESS AS TYPED BY THE PROGRAM WILL ONLY REFLECT THE 
AMOUNT OF MEMORY UP TO 28K (LAST ADDRESS = 160000). 


SW1l1 = 1 OR UP..... INAIBIT SUBTEST ITERATION 

SWi0 = 1 OR UP..... RING BELL ON ERROR 

SW9 erin’ UP. ccc DISPLAY ERROR COUNT IN DISPLAY 

REGIS 

SW9 = 0 OR DOWN... DISPLAY PASS COUNT IN DISPLAY 

REGISTER 

SWS = 1 OR UP..... HALT PROGRAM UNRELOCATED & RESTORE 
LOADERS. 


Subroutine Abstracts 
Scope 


the a ge stores in Rl the PC of the last test successfully 
executed and may be used as an aid in debugging if the program 
*bombs” because of a hardwere failure. 


Errors 


These tests print out the pc where the error was detected, the 
failing address, the good data, and the bad data i.e. 


PC=zrz2r2z ADDRESS aaaaaa GOOD DATA gggggg BAD DATA bbbbbb 


the address of the failing location is the true 22 bit 
physical address. 


Note: When testing memory locations 0-77776 the PC typed will 

be 7 multiple of 100000 greater than relfected in the program 
istin 

the address of the bad data is in (R2) -2 

the pees data in RO 

the bad data in R3 

The address of gooe data is in RY (Random Data Test only) 

when an error if detected when exercising the eters using the 

worst case noise patterns, the user should restart the program 

selecting program #e(see sec 9.1 for details) selecting the 

Sarr cer acts parameters. The user can use the PC and address 

of the failure to select the proper core bank(s) affected and 

also the specific pattern. This allows mazimum scope 

capabilities. 


Parity Error 
If a parity error is detected the program will type: 


PARITY ERROR 
PC=PPPPPP MEMORY ADDRESS IS AAAAAAAA 
PARITY ERROR REG=EEEEEE 7777777777 MARGIN 
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8.1 


8.2 


8.3 
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co 
uw 


FOl 


Where PPPPPP is the contents of the PC when the parity error 
occurred, ARARARAA is the address of the word EEEE is the 
contents of the memory error yee and 2999599999 is the 
margin setting at the time of ¢ 


After reporting the parity error the program will start over. 
Restrictions 


Starting Restriction 
Program must not be relocated when restarting 


Operational Restriction 

rogram checks contiguous memory if a parity error trap occurs 
when the program is relocated program action is undefined. If 
parity memory is available or selécted the 3ror3 test pattern 
is for parity memory only. Do not power fail the program when 
the program is running relocated. 


Miscellaneous 


If the program halts in the trap/interrupt vector area 
(QO-1000), examine register & (the stack ptr). R& contains the 
address where the PC of the instruction that caused the tra 

abort is stored. See also Rl (Rl specifies the last tes 

completed). 


Note: the PDP-11/70 will display the 
the address lights. Thus a trap to 4 
10 in the address lights. 


Stack Pointer 
The stack pointer is initially set to S20 
and 1s reset to this value at the start of each subtest. 


ap vector addresst4 in 


tr 
(bus error) will display 


Pass Count 

Sit pesece are required for completion of this program; at 
which time an “#" will be prsenee, the pass count eH be 
observed by turning the switch to the displa gous tens the 
pass count is also stored in location food. the pass count 
should be monitored in the event that the program enters an 
undefined loop..blank 1 

Error Count 

Each time an error occurs, the error count is incremented. 
The error count can be observed by turning the switch to the 
Steploy position and setting switch 9. (the error count is 
also stored in location 100c.) the prepren will count 17777(8) 
errors; the error count is no ncremented past this 
value..blank 1 

Display Register 

Either the pass count or the error count is displayed in the 
theploy register. the count to be displayed is controlled by 
the settting of switch 9..blank i 


Power Fail 


Page S 


9.0 


GO1 


The program may be power failed when running. When the power 
returns the program will continue in sequence. ##caution#® do 
not turn gower off/on until the message " power failed’ has 
been typed. this is because the stack may overflow. 


Execution Time 
Execution time is dependent on the amount of memory. 


Program Description 
The program verifies each eddress by writing the value of each 
address into itself starting at location and — at 
the last location in peters. The value of the last location 
+2 is typed on the TTY. Next the values written are verified. 
to complete the address test the complement value of each 
memory address is written starting at the last —— address 
and ending at address 20000. The written complement values 
are then verified. The next phase of testing includes 
reading on lge | and ey memory using worst Case noise 
test paltern. , opetess is poatensee, S Saatsiae using oth 
e test proceeds exercisin c nk of memory usin é 
worst case atterd. The PROGRAM THEN CHECKS Y USING 
RANDOM DATA ( ST). This routine moves the program code 
sronghent memory starting at location 20000, and relocates 
the data by a 32(10) word offset on each subsequent 
relocation. _i.e., First relocation is to 20000, next is to 
» then etc. After relocation the code moved is 
checked ——— the original code (O-17776). When the random 
data test is complete the program then successively rotates a 
O bit (ROTO) and a '1’ bit (ROT1) through all of memory. When 
all testing is complete the program increments the pass count 
(location 1000) and restarts beginning with the worst case 
noise tests. An asterisk (#) will Be typed on eeteierree of 
each pass, and when & passes have been completed the program 
will type “DEMJA DONE’ and restart the program beginning with 
the memory address tests. 
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aC.P 
y HO, MC 
: ; MAINDEC-11-DEMJA-C PDP11/70 MEMORY TEST 
2 
g 


commits SL BH CARRE ER. weer, ress 


; THIS ee CHECKS THAT ALL MEMORY S ARE UNIQUE USING ADDRESS TESTS 


- ISE TEST PATTERNS 
16 tent S Pa TP RAY TBRORARY Ge PROS pean WORROTATING ARO ROTATING 
12 
13 Hoy a0. STARING INSTRUCTIONS 
1s ; THIS PROGRAR CATES THE BBS AND T LOADERS TO ALLOW TESTING 
1g aie Th acd pk ST Re START AT Ibe. 
18 : AN ASTERISK ’#’ WILL a PRINTED ON COMPLETION OF EACH PASS, AND 
13 : THE PROGRAM NAME WILL BE PRINTED WHEN TEST IS COMPLETE. 
1 ; GENERAL gREGISTER ASSIGNMENTS 
a 509004 Araxd 
24 oooo0g2 Re=%2 
25 000003 R3=%3 
26 oo0004 R4=%4 
27 000005 RS=45 
28 000006 SP=%b 
29 000007 PC=%7 
30 000000 R10=%0 
31 000001 Rli=%1 
32 poo00e2 Rl2e=%2 
33 000003 R13=%3 
34 000004 R14=%4 
$ 000005 R1S=%45 
37 ; STATUS REGISTER (PSW) BIT ASSIGNMENTS 
38 p00001 C=] :C BIT 
33 V= ;V¥ BIT 
40 2= -2 BIT 
41 000010 N=10 ;N BIT 
e T= :?T? BIT 
43 000340 PRTY7=340 *PRIORITY LEVEL 7 
44 000200 PRTY4=200 *PRIORITY LEVEL 4 
4S 000000 KM= ‘KERNEL MODE 
46 =040000 :SUPERVISORY MODE 
47 140000 UmM=140000 :USER MODE 
48 PKM=000000 ‘PREVIOUS KERNEL 
49 010000 PSM=010000 *PREVIOUS SUPERVISORY MODE 
50 030000 PUM= “PREVIOUS USER MODE 
51 004000 REG=004000 ‘SELECT R1O-RIS 
53 ; VECTOR ADDRESSES 
4 RRVEC=4 ; OF ERROR VECTOR 
6S 000010 SVEC=10 !ADDRESS OF RESERVED INST. TRAP VECTOR 
cb 000014 TBITVEC=14 ‘ADDRESS OF ’T’ BIT TRAP VECTOR 


ee eee a —--+ ---- 


NEL EI RIO OCHA ide 


000014 TRIVEC=14 OF 'TRACE’ TRAP VECTOR 
mae rtieng aa ; ADDRESS’ Po weet 
Vensad 2 all VECTOR 


4 

61 000030 EMTVEC=30 20, ADDRESS H EMT VECTOR 

BS aed Mees iebbeess OF ih Sitter INTERRUPT VECTOR 
ee po0cs0 PIRVECSSYO : OF PIRG’ VE ; . ante 
66 000244 FPEVEC=244 i ADORE SE of ER Tne ING SB INT INT. VECTOR 
67 000250 MMVEC=250 ‘ADDRESS OF MEM MGMT ERROR TRAP VECTOR 
g REGISTER S 

53 177776 Bop DORE SE ADDRESS OF STATUS REGIS 

71 177774 SLR=177774 ee TACK LIMIT REG § ical 
= 107056 pea 55520 : Hikes DRE REETS 

74 177746 CNTRL=177746 ADDRESS OF 11/70 MEMORY CONTROL REGISTER 
ce 1773p 1hB=155ee i ABBRES OF GOFFER 

77 177564 TPS=177564 ADDRESS OF Teceeniares CSR 

* TR=1 55258 i BRPRE ae fF HA ISTER 

80 177570 DISPLAY=177570 ‘ADDRESS OF CONSOL DISPLAY REGISTER 
82 INITIAL STACK POINTER SETTING 

83 oo0so0 STKPTR=S00 

QS sMISCELLANEOUS BIT ASSIGNMENTS 

86 000100 BITIS= 100 

87 BITI4= O40000 

88 BITi3= O20000 

89 010000 BITi2= 010000 

30 001000 BIT9= 001000 

91 000400 BIT8= 900400 

8 000109 BIT6= 00100 

as ; MEMORY REGISTER ADDRESS ASSIGNMENTS 

9s 177572 SRO=177572 sADDRESS OF MEM MGNT REGISTER SRO 

6 177574 SR1=177574 SRI 
97 177576 SR2=177576 E Gebie = “SRe 
38 172516 SR3=172516 ‘ADDRESS OF MEM NGNT REGISTER SR3 

100 172300 KIPDRO=172300 ADDRESS OF KERNEL *I’ PAGE 

101 172302 KIPDR1=172302 ‘DESCRIPTOR REGISTERS 

102 172304 KIPDR2=172304 

103 72306 KIPOR3=172306 

104 172310 KIPOR4=172310 

105 172312 KIPDRS=172312 

106 172314 KIPDR6=172314 

197 172316 KIPDR7=172316 

109 KIPARO=172340 ADDRESSES OD KERNEL *I’ SPACE 

110 172342 KIPARI=172342 ‘PAGE ADRESS REGISTERS 

111 2344 KIPAR2=172344 

112 172346 KIPAR3=172346 
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DEMJAC.P11 16-MAY-77 13:58 STARTING INST & DEFINITIONS 
113 K = 
{3 We bfpaee=| Sess 
i 172356 KIPAR7=1723S6 
Ls _ s INSTRUCTION EQUATES 
1 1658 T ;SCOPE IS AN EMT TRAP 
155 ;MISC. EQUATES 
eons Rug ROW. EN POR BEGISTERS 


“DRO 0 ;SPECIAL TRAP/INTERRUPT CATCHER IF PRO- 


a RHP oAaeE 9 Fn GBR 





5 
33 = 


a5 
ci lise 


7 000664 CRLF: JSR RS, SPRINT 
000207 RTS PC 
Gooog Sevecs: ORDO 
012706 00500 PONE: MOV #S00,SP ;STARTING ADDRESS TO RELOCATE LOADERS. 
OO4767 002016 JSR PC, SRLOR 
PTWO 


.=200 
012706 o00s00 PTWO: MOV #S00,SP ;STARTING ADDRESS OF MEMORY TEST. 


2NER PoRLE 


SOPATORC SOEUR CONE SS SARE GSAS OB IRR EERO BE UO 


KO1 
BERESS Ht YEAR} ROMEO TEST EAHA AEOHAHE)olFidthidn 10108 POE 











169 002376 IMP aeSTART GO TO START OF TEST 
13? ORD 0 ;MEMORY MANAGEMENT TRAP VECTOR. 
17 .WORD O 
173 $ 
ise ;ROUTINE TO SAVE REGISTERS ON THE STACK 
176 {CALLED BY SAVE MACRO OR JSR PC, SSAVR 
i 100: $SAVR: ney ceey sSAVE RETURN PC 
AWG DS ~ 

-(5P) 
180 MOV R3, -(5P) 
181 000266 O1 MOV R2,-(SP) 
182 000270 MOV Ri, ~(SP) 
iB borer Hey Bap se ; RETURN 
185 1S: 0 ‘CONTAINS RETURN ADDRESS 
187 sROUTINE TO RESTORE REGISTERS SAVED ON THE STACK 
188 “CALLED BY RESTORE MACRO OR JSR aren 
189 000300 012667 000016 $RESTR: MOV I+, SAVE RETURN PC 
1 Boos Bisa ny 
1 10 Ol MOV (SP)+! 
193 000312 012603 MOV (SP)+,R3 
194 000314 012604 MOV (SP)+)R4 
195 000316 012605 MOV (SP)+°RS 
19% 000320 012707 MOV (PC)+'PC ; RETURN 
197 000322 1S: 0 ‘CONTAINS RETURN ADDRESS 
199 .SBTTL POWER FAIL ROUTINE 
200 ooosoe2 2502 
201 ; POWER FAIL ROUTINE a cane pa RECISTERS 

: (RO-RS) (K eeu 
Soa ORO TRe a FaeK BND ee 3 sate yin 
20S oo0so2 013746 177560 PDOWN: | MOV gETKs (SP ae ue 
Soe Booeie hooves 13 Pe Sse 160. eh ie be: AVAILABLE 
208 000816 001421 seal BEQ 38 Beal {a IF NOT AVA 
210 000524 O01 177576 MOV ase, 
tet ny - e 

sie 00! 172308 Nov ak 3 SNE OF KIPDRO 
1 i MOV #8. 
214 OO0SY4 010203 MOV R2.R3 
gi6 12046 1S HOV (RO)+,~<SP) ;SAVE KIPDRO-KIPOR7 
sis 2 Ol 172340 MOV #KTPARO, RO ;GET ADDRESS OF KIPARO 
218 012046 2s: MOV (RO)+,-tSP) :SAVE KIFARO-KIPAR7 
520 oose? 0) Rov ep tPC+ AVE STACK_PTR IN F I TION 
ot pppees revi Birk: . WORD i i ONFAING ST STACK Be ars BOWER FAIL 
£08 DaOab 000576 oj0002e4 HOV. SPUP,QS8PFVEC § ;SET POWER FAIL VECTOR TO PUP ROUTINE 


rT 
2 


———————$— SS a Sh 


Se - - - - a eae ee ee ee ee —_~« 


BISNIS SERPS ORE CORUM CR RSS CRTs SOMA ORR 
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DENT 





eas 
000650 
000654 
Ooteee 
000656 
000665 
000672 
000676 
000706 
000710 
000714 
000716 
000722 
000724 
000726 
000736 
000744 
000746 


cn 


000764 
000766 


16-MAY- 


bh 


012700 


012702 


13:58 


000016 


as 


=—N 


POWER FAIL ROUTINE 


jPOWER UP ROUTINE. 
: aePFSTK, SP SET STACK PTR 
a ia ; i heck are MGMT 1S AVAILABLE 
MOV SKIPAR7+2,RO  _;GET ADDRESS OF KIPAR7+#2 
MOV #8. ,R2 
MOV R3 
1S: Hoy (SP)+, -(RO) ;RESTORE KIPAR7-KIPARO 
MOV Re tb BR 742 RO  ;GET ADDRESS OF KIPOR7+2 
2s: HOV (SP)+, -(RO) “RESTORE KIPDR7-KIPDRO 
MOV (SP)+ :REST 
MOV ( 33/9 tans RESTORE aR 
MOV (SP)+' aaSRO "RESTORE SRO 
4g: ISI PARAVA : CHECK Tf PARITY REGISTERS ARE ENABLED 
me JSR PC, .MAMF GO ENABLE PARITY REGISTERS 
; ISR PC, SRES sRESTORE REGISTERS FROM STACK 
MOV (SP)+, J8TKS 
MOV SPDKN, d8PF VEC SET POWER FAIL TRAP TO PDWN ROUTINE 
10$: 0 
115: Inc 10S ;DELAY WAITING FOR TTY MOTOR 
JSR RS, SPRINT GO TO PRINT ROUTINE 
PWRFAIL 
6S: NOP 
RTI ; RETURN 


PWRFAIL: ASCII <15><12>’POWER FAILED’ . 
SCRLF: .ASCIZ <15><12> 


-SBTTL TAGS & PRINT ROUTINE 
VEN 


ICNT: :WORD O “CONTAINS PASS COUNT 
ICOUNT: .WORD 0 sCONTAINS ITERATION PATT 
ERCNT: :CONTAINS ERROR COUNT 
‘CONTAINS DISPLAY REGISTER IMAGE 
vA: 0 *MEM MGMT AVAILABLE INDICAT 
: O=NOT AVAIL, -1=AVA (18 BIT MODE) 
:=2=AVAIL(22 BIT Mit 
RELOCF: .WORD 0 ;CONTAINS RELOCATION FACTOR 
OUNT: :WORD 0 TEMPORARY WORKING LOACATION 
ROUTINE TO PASS MESSAGE ADDRESS TO TYPE ROUTINE BELCW 
CALL: JSR RS, SPRINT 
MESSAGE ADDRESS 


SPRINT: NOP 


MOV (RS)+,1$ ;GET MESSAGE ADDRESS 


RAEN DY RPA ON 


066767 


281 


SEN RRS O Se MR SN oes RRS ER 
88 


J GI) GIG) GIG) GIGI GN) 
(hot pt bom bao f= f= boo pt bee pe 
OONMW£Wh-O 


PRE RRE RES ES RSS 


001055 
001062 


ba be 


Saas ee 
Recs Rees SF 


a bes bs be 


8888ssss 
bb bb ee 
ps be be ee 
HSESSREVR 





= 
JIC 
= = 
vO 


Re! se90ee 


N 


00476 
1 


}=t =} 
oR 


177762 000010 


1 


JUUUUE 


177570 


000002 


177702 


ADD LO? 1d. 
Fe BEPSH gh 
ane od eee 


;ROUTINE TO TYPE ASCII 


MESSAGE . 
‘te Te ROUTINE WILL INSERT A NUMBER oF NU NULL 


ee. 


SSAGE MUST TERMINATE WITH A O BYTE. 
CHARACTERS AFTER A LINE FEED. 


;MESADR IS FIRST ADDRESS OF ASCIZ STRING 


Lng one BY THE TYPE ROUTINE BELOW 


STPFLG: ‘BYTE 0 
STKFLG: .BYTE 0 ; 
:  Hibeo «| ioseee 
MOV RO, -(SP) 
MOV aetsP) RO 
ADD #2,2(SP) 
1S: MOVB (RO) +,-(SP) 
BNE 2s 
TST (SP)+ 
MOV (SP)+,RO 
RTI 
2S: JSR PC, TYPIT 
3$: CMPB 12, (SP)+ 
BNE 
MOV SNULL, -(SP) 
4S: DECB =: SP) 
BLT 
JSR PC, TYPIT 
BR 4§ 
TYPIT: TSTB  aSTPS 
BPL 4 
MOVB 2(SP), aSTPB 
RTS PC 


ERROR TRAP SERVICE ROUTINE 
ERROR Th TST asSWR 


BPL +4 
HALT 
TST (PC)+ 

1S: .WORD O 
BNE 2s 
MOV SP. 1 
MOV (SP) Re 
JSR PC, SFORMO 


CHS TH PR Bhs 
gale wana 


;GET MESSAGE ADDRESS 
ADJUST RETURN PC 


;PUSH CHARACTER TO BE TYPED ONTO STACK 
;BRANCH IF NOT THE TERMINATOR 
;POP_TERMINATOR CHAR OFF THE STACK 

’ 


RETURN TO. CALLER 


; TYPE CHARACTER 
;CHECK IF CHARACTER a A LINE FEED 
; BRANCH IF_NOT LINE F 
;GET & OER LLERS REQUIRED AND FILLER 
; CHARAC 
j DECREMENT FILLERS REQ. COUNT 
IF _NO MORE FILLERS ARE REQUIRED 
i TYPE FILLER CHARACTER 


;WAIT FOR OUTPUT DEVICE 


;OUTPUT CHARACTER 


;CHECK IF HALT ON ERROR 
; BRANCH H IF NO HALT ON ERROR 


fn S ERROR EP vFePonT 4 REPORTED 


pp Lm 
eer 
:GET_PC_OFF 
;G0 TO FORMA 


Tack 
ROUTINE 


NO1 
BERRESSHt PME-HAREASOSBEMOR” TEST ARREY BRAM 77 1oH09 Pace 7 


337 001156 O04S67 177606 ISR RS, SPRINT GO TO PRINT ROUTINE 
$38 BBLES BB4dE9 177600 J i RS, SPRINT :GO TO PRINT ROUTINE 
tmz 

i — ORE AP Eee 
343 001174 005067 177740 CLR 1$ ; 
344 001200 000137 000200 INP 38200 RESTART AT 200 
au .SBTTL ERROR SERVICE ROUTINE 
347 sERROR SERVICE CALLED BY JSR PC,ERROR INSTRUCTION 
348 -OR HLT (A TRAP INST) 
349 001204 000240 ERROR: NOP 
= ists nate 017777. 177542 cH 447777 ,ERCNT ;CHECK FOR MAX ERROR CNT 

001216 000001 177532 ADO #1, ERCNT ; INCREMENT ERROR COUNT 
353 001224 032737 GOlO00 177570 4S: BIT #8iT9, asSWR SWITCH 9 UP? 
354 OOlese 001411 BEQ c$ 
355 O01 ONe7b? 017777 177516 BIC 817777 LODISP j SAVE RELOCATION BITS 
SS tee RRB Ba i ca 
359 OO0le62 100002 . BPL 46 ; 
360 001264 HALT 
> BIE 2 ceo 177sro = “Hoono,ausum PRINT our DESIRED 
354 001300 004767 176750 JSR PC, SSAVR GO SAVE REGISTERS ON THE STACK 
365 001304 016602 000014 MOV 14SP) Re *GET PC OF ERROR CALL 
366 001310 767 O00240 JSR PC, SF GO TO FORMAT ROUTINE 
367 001314 bows B7 177450 ISK RS; SPRIN GO TO PRINT ROUTINE 
369 001322 OO4S67 177442 ie RS, SPRINT GO TO PRINT ROUTINE 
370 O0013e¢6 002351 DIGITS 
za tales tues Ga AST eban rAR  F 
373 001340 004567 177424 JSR Be RS, SPRINT :GO TO PRINT ROUTINE 
ae DOL ae 106767 anette: Bees” MOT EOND ee 
307 001354 105767 003166 TSTB  —s~PEFLG ; BRANCH IF PARITY ERROR DETECTED 
373 001 3be OO¥567 177402 ISR RS, SPRINT GO TO PRINT ROUTINE 
381 001370 01004 MOV RO, -(SP) sPUSH VALUE TO TYPED ONTO STACK 
38 001372 004767 OCO0416 om JSR PC’ 02A GO PRINT VALUE 
384 001376 O04S67 177366 oe ae RS, SPRINT GO TO PRINT ROUTINE © 
385 001 4ae 001514 RECDAT 
38 001 408 010346 eaten HOV R3, =4SP) PUSH VALUE TO BE TYPED ONTO STACK 
388 OBliie 7 17646e 11S: JSR PC’ CRLF 
389 00141 7 1766 JSR PC’ §RESTR RESTORE REGISTERS FROM STACK 
330 0122 0367 37 177570 1S: BIT 2000, 3¥SUR ‘RING BELL ON ERROR 
392 001432 O04S67 177332 JSR RS, SPRINT GO TO PRINT ROUTINE 


a ee 


B02 
16-MAY-77 13:58 ERROR SERVICE ROUTINE 1009 PAGE 8 


_ MAINDEC-11-DENJA-C POP11/70 MEMORY TEST 
DENJAC.P11 


Qa 
§ 
if 
. : ze = p i 
a § Sg = Fag = of 
7 2 Hi BEE 4 te bs 
eg 5 3 ¢ ee a 5 woe ge 
5 3 B oy i Got gat 
* BY ene nap ee = BOS “a 
a eo 
2 8 : ee eas Haat oes 
. 
2 ih 33 eee 
: : + - souae aes i. thy 2 
+ pe 
gs ey ¢ $8 1. geeouy Bee cccue fuer steetouse® 


Scauie Sse bitasNaaaabdets opuneesEy 


e 

a 

ASCII 
DAT: AScis 
RECDAT: . 


2s 
3s: 
TRAP: 


$F 
118: 
1$ 
12S 


ASCIZ 
: .ASCI 
0S2111 Pehhéc: “Reers /PARITY ERROR REG=/ 


fag=: 


O47S22 
036807 
000014 
0001 

177572 


at cee 
OT mee 


BEES CAC NNR AUMm TMi Ric ketten wie ieee AUC ER NAS 


RETR de dp dy dh dy LY ION BOBO 0.0222 BOD DBD BBB BBD ODON Sh 


SSSS888 SSESSSSEESESS ssesssssseesesesseessssessesesacs 
EER ERS e aoa r tet SONS USEURD ELIS UIEMAD BELT ETE LST 


177144 


1. 


ee a ee we Oe 


mm nn a eee ee 








MAINDEC-11-DEMJA-C PDP11/70 MEMORY TEST MACY11 30( 1046) 12 JUL-77 10:09 PAGE 9 
DEMJAC.P11 § 16-MAY-77 13:58 ERROR SERVICE ROUTINE 
449 001714 Ol 000010 MOV #8. ,RO ;DIGIT COUNT 
4e0 bolve0 QoaNOS a ‘PRINT Faker DIGI S 
451 O00 2s: ASL Ri 
ioe ROL 
ROL R 
454 DEC RS 
455 BNE 2$ 
he] 000003 3$ MOV :D to 
002312 41§ MOVB GTABC3), (4)4 Nh) ater INTO MESSAGE 
459 CLR INDEX 
455 DEC RO ‘DEC SEE DIGIT COUNT 
460 BNE 2s 
461 Late aay aie Ret See sRESTORE REGISTERS FROM STACK 
403 176 17obls cart te 
uM RTS PC ; RETURN 
465 PARTAB: KIPARO 
467 KIPARL 
ae k pans 
4 KIPARY 
471 KIPARS 
472 KIPARG 
473 KIPAR7 
475 sROUTINE TO TYPE OCTAL VALUE PUSHED ONTO STACK 
476 “CALL: MOV VALUE. -(SP) ;PUSH VALUE ONTO STACK 
nad ” J PC, OCA *CALL ROUTINE 
479 004767 176234 JSR PC, SSAVR ;GO SAVE REGISTERS ON THE STACK 
40 016600 O00016 nov 16USP),RO iGeT VALUE 
4g2 pasoos CLR Re TORK ane REGISTER 
483 006100 ROL RO 
Wee ear 1S ADD iS Re sFORM ASCII 
ie fees fis Me HSE SEINE Locarno 
487 004557 176716 JSR RS; SPRINT :GO TO PRINT ROUTINE 
se fore Gee ee 
490 estes mr OR 
491 006102 ROL Re 
492 006100 ROL RO 
493 102 ROL R2 
4a4 006100 ROL RO 
49S 006102 ROL Re 
495 005303 DEC R3 
497 001360 BNE 1$ 
4928 04767 176176 JSR PC, SRESTR ;RESTORE REGISTERS FROM STACK 
499 12616 MOV (SP)+, (SP) 
500 000207 RTS PC 
01 oo0000 2s: 0 ;CONTAINS CHARACTER TO BE TYPED 
503 oo00000 LODFLO: .WORD 0 
504 CROUTINE TO SAVE ABS LOADER 


MAINDEC-11-DEMJA-C PDP11/70 MEMORY TEST MACY11 aie nue 10:09 PAGE 10 








DEMJAC.P11 16-MAY-77 13:58 ERROR SERVICE 

SOS ae ? 177772 SLOR: eee LOOFLO 

1 
508 133 1 017776 3S: MOV #17776,RO 

1 002140 000004 Nov QseRRVEC =; SET TIME OUT TRAP VECTOR 
1 1 TST (RO}+ 
ott i 25 a (SP)+. (SP)+ 
S15 x ie 020000 CMP + 4K MACHINE? 
ele posise 1ee7h0 O0S672 Be coo. +182,RO {PRINT RO BACK TO LOADER 
516 ix beer 000102 MOV Ro SOI é ‘SAVE FOR RESTORE ROUTINE 
517 002160 12700 Ou? 34 MOV #1500. ,R2 ;HORD COUNT 
518 1 l 10200 MOV 8LODAR’ R3 : LOADER IS TO BE STORED 
519 OGel 1 1S: MOV (RO)+, (R3)+ :STORE LOADER 
520 O0el DEC Re 
S21 002174 O01 BNE 1§ 
S22 oo0042 MOV -(R3),LSTLOC § ; SAVE LAST WORD OF LOADERS 
523 177702 DEC LOOFLO 
ed 4S: RTS ; RETURN 
526 “ROUTINE TO RESTORE LOADER 
527 002210 177674 $RLDR: TST LODFLO 
002214 001001 BNE 2s 
529 002216 RTS PC 
330 016705 000036 2s: NOV SLOR1,RS i067 af IRS FADORESS OF WHERE LOADER IS 
532 12704 010200 MOV SLOCAR, RY WHERE LOADER IS STORED 
533 ree Biers MOV #1500. 'Re Sbunt 
534 002234 012425 18: MOV (R4)+, (RS)+ : RESTORE 
535 005302 DEC Re 
53% 002240 001375 BNE 1 
537 OUcete Ole MOV (PC)+,-(RS) sRESTORE LAST T LOCATION (SAVED BY SAVE 
538 LSTLOC: .WORD O * LOADERS 
539 O022% O04S67 176516 JSR RS, SPRINT :GO TO PRINT TROUTIne 
S40 O0e2S2 002264 
S41 002254 005067 177630 CLR LODFLO 
ele 002260 RTS PC RETURN TO CALLER 
aM 002262 000000 SLORI: .WORD 0 iPIRST_QDORESS WHERE LOADERS ARETO BE 
S46 002264 047514 042101 OS110S SLDRM: .ASCIZ ‘LOADER IS RESTORED? (en cles 
S47 002272 O4444O 020123 O4eS22 
S48 002300 052123 051117 O4e10S 
S49 002306 O0S0IS 000 
S52 002312 BIGTAB: “Ol 
553 000314 031462 "23 
554 002316 O3e464 “45 
555 002320 "67 
ees MESSAGES 
S 92322 040514 052123 o4o (ST: “ASCII *LAST ’ 
559 115 O46505 7? DRESS: [ASCII 'MEMORY ADDRESS IS ° 


0S1 
O42101 OS1 


R 
Fi 
8 


ws ee ee ee ew we we -- oo ee ee 


# 
RTO Rata td kt ab iat NE A at - 


8 


BeCRRERES 


COrrronudn 
bb ee 
Om cWreO 
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Pll le-hay-7? 13:58 ERROR séavice Rout fre 

OOe34e 051505 Oe0le3 051511 

002350 O40 

002351 030060 DIGITS: .ASCII ’00000000’ 

BoSset SPACE]: .ASCIZ ° ’ 

002363 120 051501 036523 PASSNG: .ASCII ’PASS=’ 

002370 ata 000 PASSNM: .ASCIZ ° ’ 

374 - EVEN 
002374 000000 PLACE: .WORD 0 
-SBTTL MEMORY ADDRESS TESTS 
;THIS TEST ADDRESS MEMORY UP TO 128K AND PROVES 'UNIQNESS’ OF ALL 


; MEMORY Rae oe a k SEEN. oPHE TEST WRITES INTO EACH MEMORY 
ADDRESS AND THEN CHECKS FOR THE CORRECT 


: a 
;THE TWELVE HOST SIGNIFICANT BITS OF THE LAST AVAILABLE MEMORY ADDRESS 


ST 
STACK POINTER IS AT SOO 
TART AT 162 TO RESTORE LOADERS#eeeeeeeR EEE ERE EEE 


012737 oo2w4o oocc12 ETERS’ Rov SSTARTI, 98212  ;CHANGE START ADDRESS 


002376 
002404 012706 o00s00 MOV 8STKPTR, SP SET UP STACK PTR 
002410 004767 177476 JSR MONITOR & LOADERS 
002414 004567 176350 JSR RS, SPRINT GO TO PRINT ROUTINE 
002420 007520 RESLDR 
O0e422 005037 000756 ;CLEAR ERROR COUNT 
002426 005037 000760 CLR ‘CLEAR DISPLAY REGISTER STORAGE L 
002432 Ol 000760 177570 MOV Bas QaDISPLAY DISPLAY REGISTER 
002440 O01 START1: MOV SET STACK PTR 
Oo2444 CLR ‘CLEAR PARITY ERROR INDICATORS 
002450 052737 000014 177746 BIS ef TE OOSENT RL ‘DISABLE CACHE 
002455 012727 MOV aSTARTI, (PC)+ LOAD PARITY ERROR RESTART ADDRESS 
002462 O00000 PERSTRT: . WORD ‘CONTAINS RESTART ADORESS AFTER PAR ERR 
Bresso posos? | poozed th au10%7 set eRe Pass 
002470 000764 CLR OCF RELOACATION FACTOR 
002474 012737 oOcOSO2 000024 MOV #POWN. JSPFVEC :SET POWER FAIL TRAP VECTOR 
O0eS02 005037 000026 CLR aePFvecee 
;CHECK IF MEMORY MANAGEMENT IS AVAILABLE 
002506 005067 176250 CLR MMAVA ;CLEAR MEM MGMT AVAILABLE INDICATOR 
002512 032737 010000 177570 BIT #B81T12,a8SWR § :CHECK IF TO RUN WITH MEM 
002520 001020 BNE l EOC ROT USE MEM MGHT IF cis WAS SET 
002522 012737 002562 000004 MOV #1$,a8ERRVEC  ;SET TIME OUT TRAP 
002530 005037 177572 CLR as8SRO ‘REFERENCE MEM MGMT 
00254 005167 176222 COM MMAVA igeT INDICATOR TO -1 IF AVAILABLE 
012737 172516 MOV #20, J8SR3 SET 22 BIT MODE 
00254 022737 000020 172516 CMP 820; a8SR3 ‘DID IT SET? 
002554 001002 BNE :NO--BRANCH 
002556 ? 176200 ASL MMAVA :YES--SET INDICATOR TO -2 
UleSb2 Bpnee? 002574 1S: JSR PC, .MAMF GO ENABLE PARITY ACTION 


Ci ~DEMJA-C POP11/70 MEMORY TEST MACY11 
16-MAY- ME 


own 
ats 
0 “I 


————— 
oBRe SoBRe ooo 
pe feet kee 


nm 
ul 
te 


RRS Sa Saas aaa te dealt 


Biers BiBPAT 
a flere 


13:58 


002626 
002712 


000500 


176016 
172342 


000004 


000250 


a 


1 Otro) aebgs-7? 168 PAGE 12 


;FOR EXAMPLE ROUTINE WRITES 20000 INTO LOCATION 20000 


#ERRVE T 
WRTUP: RY BRONFO, @RERRVEC ; FET TEBE QUI. TBBREYECTOR 
= on SOS SMMVEC ; ABORT VECTOR 
YER” SL 
NOVO! iL RD CONS TENT none 
1S: MOV *(Re)+ OF 5S INTO ADDRESS 
ADD #2, * NEXT 1 VALUE 
BR 1S ‘WRITE UNTIL DONE 
DONEO: HOV TKPTR SET S78 TACK P 
J SF FORMAT TRROUTINE 
J5R RS; SPRINT :GO TO PRINT ROUTINE 
JSR PC, CRLF 
;ROUTINE TO CHECK THAT VALUE OF MEMORY ADDRESS ues WRITTEN CORRECTLY 
MOV PC, RI ;LOAD TRACE REGIS 
MOV #20000, R2 T 
MOV SDONE 1, JSERRVEC SET TIME OUT TRAP 
MOV , RO 
SUB 23 F0 ;SUBTRACT 2 
1S: ADD #2, RO 
MOV (R2)+,R3 GET WRITTEN VALUE 
cH RO,R3 : CHECK 
HLT * sERROR! TO DETERMINE WHICH ADDRESS WAS 
2s BR -(R2) 
COM (Re) 
MOV (R2)+,R3 
CMP RO,R3 
BEQ 1$ 


ay. TTEN nT HPROPERLY Y EXAMINE Re. NEXT EXAMINE MEM MGMT REGISTER KIPAR] 
;(IF MEM MGMT IS AVAILABLE). ADD Re AND KIPAR1 TOGETHER AS SHOWN BELOW 


; Re-2 O OOX XXX XXX XXX XXX 
: KIPAR1(772342) Y YYY YYY YYY YYY YYY 
; ADDRESS 2 222 222 222 222 222 222 7222 
BR 1$ 
DONE1: MOV eSTKPTR, SP ;SET STACK PTR 
MOV PC,R1 ;LOAD TRACE REGISTER 
;ROUTINE TO WRITE 1°S COMPLEMENT VALUE OF ADDRESS INTO ADDRESS 
:FOR EXAMPLE ROUTINE WRITES 157777 INTO ADDRESS 20000 
ped _— ;MEMORY MAGNAGEMENT AVAILABLE? 
pond SeXTPARI AS ;FIND LAST ADDRESS IF MEM MANAGE USED 
ASL R3 
ASL R3 


é 


MAINDEC-11-DEMJA-C_POP11/70 MEMORY TEST MACY] 


1 l2-JUL-77 10:09 PAGE 13 
16-MAY-77 13:58 MEMORY STS 


DEMJAC. P11 ADDRESS TE 
673 002760 006303 ASL R3 
e aa Re = : 

NV -(SP) :DEVELOP_COMPLEMENT OF LAST ADORE 
ae ica Hoy ep) 1 REYEGE ONBLENENT OF LAST ROORESE ogy 
678 000774 062603 ADD (SP)+.R3 
679 002776 012737 OOSESO 000250 HOV sMmAgt1, QsMMVEC ;SET ABORT VECTOR 
sel Bee Jere ome =: /RECLAST AOORESS 
683 003018 005103 2s CON Pa ;COMPLEMENT VALUE IN R3 
68S oosaee OiGare cee: MOV £583 eo) WRITE COMPLIMENT VALUE INTO ADDRESS 
636 1 BVS DONE 
687 00302 Oe0227 017776 CMP R2, #17776 
b8 003032 001371 BNE 1§ 

690 -SET UP TO CHECK COMPLEMENT DATA WRITTEN DOWN 
eae ean 3 Vy OPCLR GISTER 
es ney + izs716 TSI neva ERK SE BN Te AVATL 
695 0030% 012737 o00200 172342 MOV $200, 98KIPAR1  ;INIT KIPARI 
6% 003054 012737 005616 O002S0 MOV SMMABTO, JSMMVEC :SET ABORT VECTOR 
697 003062 012737 003122 O00004 1S MOV 8DONEY, OSERRVEC ' 
698 003070 Ole702 Oe0000 MOV #20000; Re FIRST ADDRESS 
699 003074 010200 MOV R2, RO 
700 003076 905100 COM RO FIRST DATA (COM OF ADDRESS) 
701 003100 ooo00e2 ADD #2, RO 
702 003104 162700 oo0002 2s SUB #2,R0 
703 003110 MOV (R2)+,R3 ;GET VALUE 
704 00311 CMP RO,R3 : CHECK 
70S 003114 001773 BEQ 2s 
706 003116 104400 HLT 
707 003120 000771 BR 2s 
708 003122 000240 DONEY: NOP 
¢ 
710 ROUTINE TO WRITE BANK # INTO ALL ADDRESSES IN A 4K BANK 
711 003124 012737 003172 oOO00004 MOV SOONEYA, ASERRVEC;SET TIME OUT TRAPS VECTOR 
712 003132 010701 »R1 
713 003134 004767 002354 ISR PC’ LOMMO 
714 003140 012737 005616 000250 MOV SMMABTO, JSMMVEC 
zis 003146 012702 O20000 HOV #20000, Re 
ices 
71 ohse4 nOSe0C 1S: INC RO :RO WILL BE DATA WRITTEN 
718 003156 012704 010000 MOV #4096. . RY "SET 4K COUNTER 
719 003162 010022 2s: MOV RO, (R25+ ‘WRITE BANK # INTO ALL ADDRESSES 
720 003164 005304 DEC RY 
721 O03166 001375 ONE 25 
782 003170 000771 BR 1S 
724 003172 O22626 DONEYA: CMP (SP)+, (SP)+ ;ADJUST STACK PTR 
726 sCHECK THAT DATA WRITTEN ABOVE CAN BE READ 
727 003174 012737 oO3e42 oD0004 MOV SDONEYB, JSERRVEC 
728 010701 MOV PC.RI 


a ee ew we eee ee ee eee oe 


MAI 
DENT 
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-Pll ~~ «:16-MAY-77 13:58 Y ADDRESS TEST 5 
004767 002304 JSR PC, LOMMO 
020000 MOV #80000, Re 
CLR 
1$: INC 
12704 010000 MOV #4096. RY 
12203 2s: MOV (R2)+,R3 
020003 CMP RO, R3 
0018401 BEQ +4 
1032; need DEC RY 
003238 001372 BNE 2 
riety poor ee DONEYB: CMP (SP)+, (SP)+ 
;ROUTINE TO WRITE CONSTANT DATA INTO 4K 
Nets jBANK STARTING WITH L LAST MEMORY LOCATION 
0032% 012737 O0SESO MOV anARGTI, aeMMVEC 
003254 162702 000002 SUB 
003260 005000 CLR 85° Re 
003262 005300 1S: DEC RO 
003264 012704 010000 MOV #4096. .R4 
003270 010042 2S: MOV RO, -(R2) 
003272 102406 BVS DONEYC 
onser Gecee? 017776 CMP Re, #17776 sCHECK IF DONE 
1403 BEQ DONEYC 
003302 005304 DEC RY 
003304 001371 BNE 2$ 
003306 000765 BR 1$ 
003310 012737 oO3422 DONEYC: MOV 8DONEYD, J8ERRVEC 
003316 010701 MOV PC, RI 
003320 004767 002170 JSR PC’ LOMMO 
003324 012737 O0Sb16 MOV #MMABTO, JaMMVEC ;SET ABORT VECTOR 
003332 Ole702 o20000 MOV ,Re 
003336 022704 0O10000 1S: CMP #4096. ,R4 :CHECK IF WRITE ABOVE STARTED ON 
4K BOUNDARY 
003342 001415 BEQ 
AEE tas MOV (R2)+,R3 
CMP RO,R3 
0033S9 001402 BEQ 4§ 
003352 104400 HLT 
003354 000406 BR S$ 
003356 142 4S: COM -(R2) 
003360 lle COM (Re) 
003362 012203 MOV (R2)+,R3 
003364 020003 CMP RO,R 
Bes lag 3 
003372 O00S204 SS: INC RY 
003374 001360 BNE 1$ 
003376 005200 2s: INC RO 
ete pie ae 3$ NOY PaOse AN” 
603406 here CMP RO,R3 
003410 001401 BEQ +4 


RBAYRECS }} DEM] R~6 POR} 1 (20. EMORY TEST nec Ad | ugteaeugena-7? Oe PAGE 15 


Piet eiaiisieie triacs ot 


Bors Mier: Be 


Sel en eel el cee ee ee ee 


WO NOU WO 


820 
gee 
823 
824 
82S 
826 
827 
623 
830 
831 
832 
833 
B35 
836 
837 
B38 
840 


003412 104400 
003414 005304 


: 


Es 
003530 
003532 004767 
003536 
tes 
003552 


000042 


177776 
001756 


o0421e 


177746 


17S260 





175156 


DEC 3 
DONEYD: CMP (SP)+, (SP)+ 
#4 ;BRANCH IF PROGRAM WAS NOT 
GIN1 ;LOADED VIA ACT11 IN QV OR AA MODES 


eB Foc :BRANCH IF NOT IN QV MODE 


ee ee ee 


Pe Se aa TRIESTE. hoon 


beg INI: TR, SP ;SET STACK PTR 

ats 4 Koch RL ; DISABLE CACHE 

ISR PC, Pe SR GO ENABLE PRRITY ACTION 

CLR 160 Ce thot cat bat TO WRITE NORMAL 3X9 PAT 
PARPAT: .WORD 

CMP #-2, MMAVA 22 BIT MODE 


aR NRARGIN iN: -80 SETUP MARGINS 


MATTE x Re 9 TEST PATTERN STARTING AT ADORE penon | tS AVAILABLE, 
AND IS A RODIFTED mre en MEHORY Is IS : 


s THE CONTENTS OF (PARPAT IF T 0 INDICATE IF NORMAL MOO IFIED PATTERN 
pe = No The ; SET STACK PTR 
NER ant? oeeRRVEC SSeS TIME CAT TRAE VECT 
MOV #1,-(SP hoy St hR NG BANK # ON STACK 
CLR -( Sp) :PUSH ® OF 256. BLOCKS TO WRITE 
ISR PC, .3x9 :CALL ROUTINE TO WRITE 3XOR9 PATTERN 
“CHECK 3 XOR 9 TEST PATTERN WRITTEN ABOVE 
BONE7: MOV 8ERRTRP SaERRVEC 
MOV (SP) ,RO # OF WORD BLOCKS WRITTEN 
NEG THO” COMPLEMENT 
MOV RO, (PC)+ ‘Suet 256 WORD BLOCKS 
WOS.256:.WORD 0 ‘CONTAINS # OF 256 WORD BLOCKS IN MEM. 
MOV 8STKPTR, SP ‘SET S P 
MOV PC,RI ‘SET SCOPE PTR 
MOV #1'-(SP) ‘PUSH BANK # ON THE STAC 
MOV -(5P) WORD Er SeKS TO WRITE 


;PUSH ® OF 256. 
;G0 CHECK DATA WRITTEN 
;SETUP TO RUN mop se tee awe 9 PATTERN IF PARITY MEMORY IS AVAILABLE 


;BRANCH IF PARITY MEMORY IS NOT AVAIL 
;BRANCH IF PARITY PAT JUST WRITTEN 


a ee 


BBAYRECS jf “DENY A064 720. EMORY TEST egy 4. chee Aahee feaqyt-?? J0e :09 PAGE 16 
Bue boseee Bides? 003472 Rot Gp SePARPRT ;SET INDICATOR TO WRITE 3X39 PAR PAT 


;REPEAT TEST USING MODIFIED 3x9 PATTERN 


nore como RUE A TET Sm LS som 


Seaee 


003634 012737 003656 000004 BQONES, ORERRVEC ; if mesteh 
ag raat BS2R2 oo0002 rRY AoeR SP) ea ON THE STACK 
8S0 003650 O0S046 CLR -($P) # OF BANKS TO WRITE ON THE STACK 
B51 003652 004767 003222 JSR PC, .8X13 :G0 Bb to "ROUTINE TO WRITE DATA 
K 37 T WRIT 
Bei D5 012706 000500 BONES i . terk, TBRN Lan BFEeR pre 
003662 010701 UPDATE TRACE REGISTER 
855 012737 001126 o00004 ey REARTRP QNERRVEC 
957 0036 ooo002 MOV #2, -(SP3 
858 NEG RY 
iotste] 042704 000001 BIC #1,R4 ;SET 4K BANK COUNT TO 8K INCREMENT 
860 1403 BEQ 10 :DO NOT CHECK IF ONLY 12K 
861 10446 MOV 4,-(SP) 
Bbe 003710 004767 003172 ISR PC, ..8X13 GO CHECK 8 XOR 13 PATTERN WRITTEN ABOVE 
864 
B65 003714 ogo00s DONE1O: RESET ;DISABLE MEM MGMT AND PARITY ACTION 
867 
868 .SBTTL RANDOM DATA ROTATING 1/0 TESTS 
869 “RANDOM DATA TEST. THIS TEST MOVES THE PROGRAM CODE THROUGHOUT MEMORY 
870 003716 010701 RANTST: MOV PC,R1 - TRACE POINTER 
871 003720 012737 OO40SE o00004 MOV 87$, d8ERRVEC :SET TINE OUT TRAP 
872 00576 175030 TST MMAVA *CHECK IF MEM MGMT IS AVAILABLE 
873 001412 BEQ 1$ :BRANCH IF NOT AVAILABLE 
874 003734 001554 JSR PC, LOMMO :GO SET UP MEM MGMT 
875 003740 105237 172301 INCB asKIPORO+1 “ALLOW 4K ADDRESSING IN FIRST 4K 
B76 oosr o1 O7 7406 172304 MOV eeO0#eSb = +UPSRW, a8KIPOR2 — ;SET KIPDR2=RW UP 200 BLOCKS 
1 172344 MOV aK IPA 
878 003760 Ol2702 d20000 1S: MOV #20000, Re ;SET °TO’ ADDRESS POINTER 
879 003764 OOSD04 CLR RY -SET FROM’ ADDRESS POINTER 
880 003766 012705 oo4000 25: MOV #2048. RS >SET 4K WORD COUNT 
881 003772 Ole422 3S: MOV (R4)+, (R2)+ + MOVE 
882 003774 Ole4e> MOV (R4)+) (Re) + 
883 003776 005305 DEC RS ;DECREMENT 4K WORD COUNTER 
Bey 004000 001374 3$ 
886 OO4002 012705 ocos4Os MOV #4096. -PLACE+1,RS ;SET 4K WORD COUNTER 
887 OO¥006 014400 4g: -(R4) RO sGET , "spare 
888 004010 014203 MOV -(R2)'R3 : > DATA 
B83 oov0le Se0003 CHP RO,R3 :COMPARE ’GOOD’ & ’BAD’ DATA 
89 OME 7 TST (R2)+ STE SS FOR ERROR ROUTINE 
Bae DONdeS | 498400 Me BoRt 
33 oo4d22 005742 a TSI ={R2) a RESTORE sBODRESS POL NTER 
Bx Seabee 00136 BNE 4 + POP UNTIL i OBR DS : CHECKED 


KO? 
EL NE EPO eH? 


Be RRs ao ses 
as 


OO00w0 
= 
£ WO 


Ww 
4 
[Ve] 


CARTS SE REGS OMU RRS DRO BOS OER 


NNYO 3 
vote 
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eeeeeees = 8898 


ae SeNeEeseS 


98 


See 


8 
g 


004260 


Si 


ae 


SSS 
Beha 


VE 
RS 


Sess 





003264 


177746 


13] CK IF_MEM AVAILABLE 
H IF NOT NAIL E 
INC aaKIPARI 
me ge oo 
6S: RO ab4. , Re ; STEP ss 
78: . : T T 
ney TERRIER” Sheraveci REetORE PRK ob Baap VECTOR 
{ROTATING O TEST. THIS TEST ROTATES A SINGLE 0’ THROUGH MEMORY 
ROTO: HOV 1, gr T TANT 2177777 
MOV 256, -(SP) Ts oF 8 WORD BLOCKS IN MEMORY 
JSR »ARTPAT WR “THROUGHOUT MEMORY 
MOV #1,-(SP) poe SET STARTING BANK 8 ter dk Si, 
He > RSTO 185 18 Sorate: PaeD Age 
;ROTATING 1 TEST THIS TEST ROTATES A SINGLE ’1’ BIT THROUGH ALL OF 
ROT1: CLR . CONST CLEAR TANT 
MOV #1.-(SP) ; PUSH Rt ING BANK ONTO STACK 
MOV WOS. 256, -(SP) 8 OF es WORD BLOCKS IN MEMORY 
JSR PC, iGo WRI “THROUGHOUT MEMORY 
MOV PC;R1 SCOPE PTR 
MOV #1/-(SP) SET STARTING BANK 8 
MOV WOS.256,-(SP) T 8 OF 256. WORD BLOCKS TO CHECK 
ISR PC, .ROTL 60 ROTATE A *1’ BIT THROUGHOUT MEMORY 
-END OF CYCLE 
END: RESET 
IC #14, J8CNTRL sRESET MACHINE TO KEY-START STATE 
MOV = PC RIL ; UPDATE REGISTER 
MOV sStKPTR, SP :SET STACK P 
INC DSICNT ‘T COUNT 
CMP (PC)+, a(PC)+ sce FOR LAST PASS 
ENDCT: .WORD é S 
“WORD ICNT ADDRESS 
BEQ pean IF LAST PASS COMPLETED 
JSR RS, SPRINT ‘GO TO PRINT ROUTINE 
ASTERISK 
DeBEGINI 
DONE: 
JSR RS, SPRINT :GO TO PRINT ROUTINE 
en B auTPs ;WAIT FOR BELL TO RING 
HOV p82 RO GET DECTAPE MONITOR RETURN ADDRESS 
JSR PC, SRLOR ;RESTORE MONITOR & LOADERS 
SENDAD: JSR PC; (RO) :GO TO DECTAPE MONITOR 
NOP 
NOP 
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DEMJAC.P11  16-MAY-77 13:58 RANDOM DATA, ROTATING 1/0 TESTS 
353 004270 000167 176144 FINISH: JMP START 
955 .SBTTL PROGRAM SUBROUTINES 
955 adrieg SBT RELOCATION ROUTINES 
8 goue7 1 RELOC: MOV (RS)+ ;GET FROM ADDRESS 
il MOV (RS) Re GET TO ADDRESS 
90 004300 010203 a HOV Re 
us cat BSE 000004 MOV 4S DeERRVEC te OUT TRAP 
004314 CLR RY OCATION SUCCESSELL INDICATOR 
964 004316 TST (R3)+ See F MEMORY IS AVAILABLE 
%S5 004320 Ol20e2 1S: MOV (RO)+, (R2)+ SCAT 
96 OO04322 Oe0c03 CMP R2,R3 tRELOCAT ON COMPLETE? 
97 004324 001375 BNE 1$ 
foe Bas = eR 
970 sae 001413 BEQ cs ;BRANCH IF DONE 
971 nae ikea CMP =(RO),-(R2) CHECK THAT DATA WAS RELOCATED PROPERLY 
355 al 3 ;CHECK IF RELOCATING BACK TO 000000 
ape a atid fFe 1 ERROR! CANNOT RELOCATE PROGRAM CODE 
976 TO UPPER MEMORY BANK PROPERLY 
977 004346 00000 HALT 
$78 O043SD0 000767 BR 2s CONTINUE RELOCATING AT YOUR PERIL 
979 O043S2 000000 3$ HALT ‘ERROR! CANNOT RELOCATE CODE BACK TO 
980 TO OOO000 PROPERLY 
981 004354 000777 BR . 
982 004356 Oeebeb 4g: CMP (SP)+, (SP)+ sRESTORE STACK PTR 
983 004360 005104 COM RY 
984 362 000240 Ss: NOP 
98S 364 Ol2702 000764 MOV SRELOCF , R2 GET ADDRESS OF RELOCATION FACTOR 
986 004370 061502 ADD (RS), Re ADD FACTOR 
pt 004372 012512 MOV (RS)4, (R2) sRELOGATED RELOCF NOW CONTAINS RELOCATION 
383 004374 0020S RTS S RETURN, R4=-1 IF NO RELOCATION 
991 
992 ROUTINE TO RELOCATE PROGRAM CODE FROM ORIGINAL POSITION (0-4K) TO 
993 “TOP OF MEMORY. 
994 004376 012700 o20000 RELOCP: MOV #20000, RO -SET UP TO SCAN FOR TOP OF MEMORY 
99s dovHoe 012737 000006 oj0004 MOV sERRVECS, aNERRVEC 
996 OO4410 062700 d20000 1S: ADD ; INCREMENT SCAN ADDRESS 
997 OOW4I4 000261 SEC i one TIME OUT INDICATOR 
998 004416 005710 TST (RO) ‘CHECK FOR EXISTANT MEMORY 
999 20 BCC 1$ :*C? WILL BE CLEAR IF MEMORY EXISTS 
1000 22 Ol 001126 o00004 MOV #ERRTRP, QRERRVEC’ 
1001 004430 162700 020000 SUB #20000, RO ;ADJUST TO LAST EXISTANT 4K 
1002 O04434 010067 000006 MOV RO, 2S PASS RELOCATION ACDRESS TO RELOC ROUTINE 
1003 7 177630 ISR RS, RELOC RELOCATE PROGRAM 
io0e 2g CORD. 0 ae iv oe 
1006 OO44SD Boeeey 174314 JSR RS, SPRINT GO TO PRINT ROUTINE 
1007 OO4454 010047 RELOCM 
1008 OO4456 01674 177764 MOV 2$,-(SP) ;PASS TO O2A ROUTINE 


ee 
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1 
DEMJAC.P11 16-MAY-77 13:58 RELOCATION ROUTINE 


ite Boasee Bbs7e9 Pueiss SOR ARELSAK, (SP) FET UR BRR Lopprce 

Ce Rit. Site 

ot ape erie ROY eR +, (SP) 

1014 oo4S504 O00000 3 .WORD O BINS RETURN Be 

1015 OO4SO6 066716 177734 ADD gS, (SP) SEOTUST RE TURN PC 

101 O04Si2 000207 RTS 

tae .SBTTL MA/MF PARITY ERROR ICE ROUTINE 

1019 ;WHEN MA/MF A PARITY ERROR IS DETECTED THIS ROUTINE SCANS MEMORY FOR THE 
ist OETA HE aiaeeesd In igh eONT IME PIER ve ER PRESS CONT 
1022 pos 14 010067 000170 ” PARSRV: MOV RO, SAVRO "SAVE RO IN SAVRO 7 
1023 012700 004712 MOV 8SAVRO+2, 

1024 O04S24 010120 MOV Ri, (RO)+ 

1025 004526 010220 MOV Re, (RO)+ 

1026 004530 010320 MOV R3, (RO)+ 

1087 tees 10420 MOV Ra, (RO) + 

des Doves OOHEE/ 174226 Ie Re! SPRINT :GO TO PRINT ROUTINE 

103 (PC)+ INDICAT 

ie Bree venus, Bine § AP eden Baha Bee 

1033 nal 000 PENFLG: .BYTE 0 NOT 0/0=PAR CTED/NOT DETECTED ON SCAN 
1034 012737 004616 000114 MOV #25, JUPARVEC 

1035 004556 012737 004654 000004 HOV 845, OBERRVEC :SET Tine OUT TRAP VECTOR 

ipsa ONES ier lhe seo Oise EH te NOT AVAILABLE 

1039 004574 004767 1 JSR PC, LDMMO ISET UP MEM MGMT 

1040 OO4600 105237 172301 INCB asKIPDRO+1 "ALLOW FULL 4K PAGE I 

1041 OO4604 012737 = 000250 MOV SMMABTO. aSMMVEC ;SET MEM MGMT ABORT TRAP VECTOR 

1042 OO%612 012200 1$: MOV (R2)+,RO >SCAN ALL ADDRESSES 

1043 004614 000776 BR 1$ 

Love 004616 110667 177724 2s HOVE SP ,PEFLG ;SET PARITY ERROR FOUND INDICATOR 

1046 Goes 1OsH0g 5 HLT “ sPARITY ! ADORESS+2 IS IN R2 

1049 GOMES? DOSE? 177710 8: TR O#PEFLG HINSERT. ba WerTy ERROR INDICATORS eo 
1050 004636 012706 000500 HOV : #STKPTR, SP RESET STACK PTR 

1052 adhd aoboDe 000512 ISR PC, . MAMF ;G0 PARITY ERROR DETECTION 

1053 OO4650 000177 175606 IMP aPERSTRT *RESTART SELECTED PROGRAM 

1055 “SERVICE ROUTINE IF PARITY ERROR NOT DETECTED ON SCAN 

iiSe poesy 06767 irmece STB EFC Bron TF PeRL TY EROR Ws 

1088 DOMEee estos pooooe es aeRe BL PAT Tie a 

1060 72 110667 177651 MOVB SP, PENFLG ‘SET IND = NO PAR ERROR DETECTED ON SCAN 
1061 G46 78 bove67 174066 JSR RS; SPRINT GO TO PRINT ROUTINE 

1063 oou704 104400 HLT a ;ERROR! PARITY ERROR NOT DETECTED ON SCAN 


a ee -—- -=— - i a a 


MAINDEC-11-DENJA-C POP 
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5 geass 
0S112 
i 000 
116 043040 
052517 116 047440 
1079 004760 020116 O4%lSe3 047101 
1080 004766 005015 000 
1081 004772 
1082 
ae 
yi eons 
FE ite 
inn 
ie 
ine 
ies 
1094 
1095 
1 
1 
1098 005 
1099 0050: 
1100 005036 
1101 O0S04e2 177570 
1106 00S0S0 001071 
1104 OO4S57 173712 
HE GE BRL 
1107 005060 aba? 173704 
1108 O0S064 1475 
1109 005066 01 000002 
1110 005072 066716 173666 
Hu Bete Baus Is 
itié 005106 002361 
1115 110 012700 002351 , 
tHe it : 000010 
1118 158 
1119 005126 006301 
1120 005130 106102 P 


1S: 


100$: 
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ITY ERROR SERVICE ROUTINE 


in THE SAVED CONTENTS OF RO-RS WHEN THE 


ee 


: .ASCIZ <15><12>’PARITY ERROR’ <15><12> 


: .ASCIZ NOT FOUND ON SCAN’<15><12> 


YES -- DOUBLE PARITY ERROR 


3 ey * tee ‘BRANCH TF -- hi 
s 


JMS QPERSIRI 
MOV FLG ;SET PARITY ERROR FLAG 

TST aeSuR :HALT ON ERROR? 

BP 100$ ; BRANCH IF NO 

MOV QeMEMERR, - (SP) ; MEMORY ERROR REG 

MOV a 0B ;GET OF WHERE THE PARITY 
MOV a : 

MOV (SP), aahe! “CLEAR THE ERROR REG 

BIT #81713, a8SuR j INAIBIT TERROR TYPEOU 


ace ~(SP) ;GET PC AT TIME OF PARITY ERROR 


ocr, (SP) 
JSR z 

JSR ‘SPRINT 
SPACE 1 


;CHANGE 22-BIT MOOT ETTS RO OCTAL-ACSIT 


4g: 


MOV IG 
MOY 


BO3 
12-JUL-77 10:09 PAGE 21 
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16-MAY- 


DEMJAC.P11 


Ss 
ADDRESS 
TION IS TO 


or 


32 


TE 
T 


a 

. ; yee 
«! a Bwis5 & £ 

mmm ene fisarh by. 
establolol sole oteesbolall feial ai iii of 
ee & 4g 3 alt a 


LSTRB: 
LCRNT 
HCRNT 
O43S22 MARMSG: .ASCIZ 
EVEN 
. MAMF : 


com 


i ae Pee 
goed a uscase DOOM) A) eae 


TUVUOCUURM GO Oe eos ss ss PFS Ss RMR RN BosSDSRSBORA RRR 


pa php ph php ph ph ph pi pipe oh ph ph Ki ph ph ph A A A bib 
Sa eae Rete Reem Ream Ream Rane Ree Rae Ramee Ree Kee Kame Kame Kent Rome Keon Kam Ram Kern Kee Kame ham Ras kam hee Ram ee hen oe toe, ee ee ee ee oe ee ee ee! 


teen 173546 
oo 
73536 
175222 
Sin 
ll 
ese4 
1117 
1 
71 
1 
15 
006412 
005362 
000114 
005362 032737 000040 177570 
001007 


005370 
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INDEC-11-DEMJA-C PDP i/70 MEMORY TEST l 2-JUL-77 Le PAGE 22 
AC.P11  16-MAY-77 13:58 oe pant ME RoR met ROUTINE 
1177 ;ENABLE PARITY ERROR DETECTION 
1178 005372 042737 o00002 17774 BIC 82, J8CN EU pee PARITY ERROR 
1180 OO0S¥O0 012767 000001 O000S6 MOV #1, PARAVA : CTION INDICATOR 
1181 OOS406 oo040S BR 
1182 jQISABLE PARITY TECTION 
ties eM 10 Ree 4 epee 7% | cur id iCheaR Pani TY ERROR ME SOn INDICATOR 
1188 3 SET abe FeRITY ERROR SERVICE TRAP 18-BIT Pre’ 
1187 ooS4¥22 012737 OOYSI14 000114 2: MOV #. PARSRV, J8PARVEC ey IT ADDRESS PARITY 
1188 005430 012737 000340 000116 MOV #340, Q8PARVEC+2 : ean (oe 
1130 005436 022767 177776 173316 cre <2, ARAVA gee 11 ADDRESS 
118 ene 012737 004772 000114 MOV #.22PAR, J8PARVEC’ a OBIT ADORESS PARITY 
igs OOS4S4Y 012737 000340 000116 - OV S40, aePARVECH? 17 TR PLS SR on TRAP 
1% O0S464 Doone PARAVA: .WORD 0 I ICAT 
tle i TH AARPEAETECHat HR i Biseatep 
1198 ITY ERROR DETECTION IS ENABLE: 
1199 
ist T IN ROUTINE 
1 jpourine 79 ce Ni NARGINS 
1203 177750 TRG=1 
1205 OOSbe 016700 173260 MARGIN: oH om rast Coun 
1 preurg retsit 005506 177750 B(RO) , aaMAIN TER INTENANCE REG. 
1208 o0sso2 077201 1S: 
1203 005504 000207 Ber? 
lel MRGNT 0 ; NORMAL 
1513 Bosse? = Bos ~ ‘ q {EARL Y, STROBE 
Ba ge i ae 
i5i¢ poeeie O12 “BYT 9 Hae cree 
1216 005513 900 BYTE O 
TTL MEM MGMT ROUTINES 
-ROUTINE TO INITIALIZE MEMORY MANAGEMENT REGISTERS 
000240 LOMMO: NOP 
005767 173240 TST MMAVA 
Nese 172516 at iS, aaSR3 -22 BIT MODE 
515935 hanes 172300 MOV a eser -400+UPSRW, J8KIPORO § ;SET KIPDRO=RW UP 177 BLOCKS 
Bae037 077406 172302 HOV enpagse --400+UP+RW, SeKtPDRA :SET KIPDRI=RW UP 200 BLOCKS 
172344 CLR Sex PAROS 
077406 172316 MOV Sactraes .-400+UP+RW,G8KIPDR7?  ;SET KIPDR7=RW UP 200 BLOCKS 
Bene ie mi 
12737 172342 MOV 8K IPARL 
912737 177600 172356 MOV sio7b00. aeKIPAR? 





a ee 
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DEMJAC.P11 16-MAY- MEM MGMT ROU 
1 37 000001 177572 MOV #1,d8SRO ;ENABLE MEM MGMT 
8% Qoseie dode%0 Ne 





2 
1235 005614 1s RTS PC 

i . MANAGEMENT T ROUTINE F TE UP 

l posb1é 1270 020000 ineoro: MOV 2 sRecet he 

1239 000200 172342 ADD 8200, d8KIPARI =; TO NEXT 4K 

1240 005630 013716 177576 MOV asSRe, (SP) *RETURN TO INSTRUCTION THAT 
1 505037 irrere CR aaSRO ‘DI MEM MGMT 

l 1 1 177572 #1, d8SRO : MEM MGMT 

Leas 46 000002 RTI *CAUSED THE ABORT 

14s MEM MGMT ABORT SERVICE FOR WRITE 

ee eee m1 iim ‘<~'™ 

iSug Sosees Brad ne 

1249 005664 013716 177576 MOV aaSR2, (SP) 

12S0 005570 012737 GO0001 177572 MOV #1, a85RO ;ENABLE MEM MGMT 

1251 005676 O00002 RTI 

1252 005700 2s: 

iss ye, bonbos o0000e 5 oe USP) peer. Sen ee 

ig Bris Geace ee 

1257 “ROUTINE TO SET UP MEMORY MANAGEMENT FOR PATTERN TESTS 

1288 0s? 14 005702 STMM2: qs Re CHECK, IF TESTING BANK 8 0 
1260 rie BES MMAVA ‘ | 

1261 005724 BNE 1$ ;BRANCH IF MEM MGMT AVAILABLE 
1268 00576 ROR R2 !ADJUST ADDRESS 

1 ROR Re 

1264 005732 006002 ROR Re 

1265 005734 006002 ROR RP 

ebb 005736 000207 RTS PC : RETURN 

1268 005740 004767 177550 1$ JSR PC, LDMMO ;GO MAKE INITIAL SET UP 

1269 005744 000302 SWAB OSséR2 

lent Bers He prem my RE augron 

ies Gere Bre nese ie 

1273 1 172346 MOV Re, aRKIPARS 

1274 005764 012737 172304 MOV #200%256.-400+UP+RW,38KIPOR2 § ;SET KIPDR2=RW UP 200 BLOCKS 
1275 O1e737 172306 MOV *-4OO+UP+RW; DBKIPDRS = :SET KIPDR3=RW UP 200 BLOCKS 
1276 006000 17231 CLR oak 

1277 006004 012702 O40000 #40000 

i558 rates piers ered TOES NOV Hi Bete.e - ENABLE MEM MGMT 

1280 era 006207 2S: RTS pC’ ‘ 

12oB2 “ROUTINE TO SERVICE 8 XOR 13 ABORTS 

1283 006026 000240 MMABT2: NOP 

1284 006030 012702 040000 MOV #40000, R2 

1285 006034 000400 172344 AND #400, gh IPARE 

1286 OO06042 062737 OO00400 172346 #400; J8KIPARS 

1287 006050 13716 177576 MOV aeSRe, (SP) ;SET RETURN TO INSTRUCTION THAT ABORTED 
1288 006054 012737 CO0001 177572 MOV #1, a85R0 ‘ENABLE MEM MGMT 


(1046) ey > 30 PAGE 24 


OUTINES 


RTI 


MACY11 30 
MEM T 


/70 MEMORY TEST 
13:58 


ji 


16-MAY-7 


C-11-DEMNJA-C POP 


Pll 


MAI 
DEMJ 


<- i= w = oO z 
fe 8 ne © 
58 <a -F ya 
os * 2 #8 S 
Ce al z T> ow > wn x 
é m= Ba co fs : 
ibs Sf ce HE, 2. 
"es & Eh ea SEG 8 & 
utes & OS EB wha feo E. 
1 on a e283 2% 
os g 
268 cece 
Lo 2a > a e+e Te >> + Ee $4 > 3 ——~ 
“% *E o & EE 22Re Meee Bee BONE Ss & oo fe 
8 ow Be 3 ik es oe 6s ke! eo se A & Pr) ~~ z o 
wes ;Se22i" 22 eee sees weed seed exeedn sande 8 F 
Se i 
ween SRGRSPH SE SSE SESE ESSE SESE HSSELE ANSSSE a 
¥ aa 
as $s Ss at 


ig 7 oe 
pe BE AGS) SERS SOS OE a eee 


88 RUG BHR SHTP RHR BYSBRE LYBSNz 


amd 

i=) 

z= or 
Kom) 

~-? 


BAR HOR BERANE Sane ah NN RNR MRR oe 


hh md hh th hh a td th a tt tt a te ti 8 
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DEMJAC.P11 16-MAY-77 13:58 3 XOR 9 ROUTINES 
ie po be oo2000 3181 a 3a0p Re BRECK BIT ie i 
ie Q THC *BRANCH IF BIT 9 =0 
1 002000 .31S0: BIT »R2 ; CHECK eI 3 
1350 001404 BEQ 3189 
1351 7? 172506 .3NOT9: TST ICOUNT CHECK I FORMAL OR cbretenemt Serine DATA 
es tees iBirg Sth 
1354 005767 172476 .31S9: TST ICOUNT 10 kD IF Rarer Cos OR COMPLEMENT DATA 
1355 100005 BPL LONORM ‘GO LOAD NORMAL CONSTANTS 
1358 012700 77777 LDCOMP: MOV a1 Rg ?SET COMPLEMENT CONSTANTS 
1 1 01 MOV 1,R3 
1358 000207 RTS PC : RETURN 
1359 012700 000401 LDNORM: MOV #401, RO LOAD NORMAL CONSTANTS 
1360 012703 177777 MOV #-1,R3 
1361 000207 RTS 
1363 ;ROUTINE TO CHECK 3 XOR 9 WORST CASE NOISE PATTERN 
1364 :CALL: MOV -(SP) {PUSH STARTING BANK # ONTO STACK 
1365 : MOV BLKcnt -(SP) 256. WORD BLOACK COUNT 
1366 : ISR 3x9 CALL ROUTINE 
1368 006304 900240 ..3X9: NOP 
13 § 006306 004767 001104 ISR PC, CKSWR GO CHECK SWITCH REGISTER 
1371 - CHECK WORST CASE PATTERN 
1372 006312 016604 o00002 1§: 2(SP), GET 256. BLOCK WORD COUNT 
1373 OU6316 O16602 O00004 NOY 4(5P) Re GET FIRST BANK ® 
1374 OO322 004767 177366 JSR PC, STMM2 :GO SET UP MEM MGMT 
1375 006226 905909 CLR ie ¢ WORD 
1376 006350 005767 172420 TST ICOUNT ICOUNT IS NEG AM CHECKING COMP- 
1377 006334 i9N001 +4 *LEMENTED PATTERN 
1378 006336 005100 COM RO SO COMPLEMENT CHECK WORD 
1379 006340 012705 oj0040 2s: MOV #32. ,RS ‘SET 256. WORD COUNTER 
1381 006344 005767 175122 3S: TST PARPAT BRANCH IF PARITY MEMORY PATTERN IS 
138 006350 001402 BEQ 30 :NOT TO BE CHECKED 
1384 006352 004767 177640 JSR PC, .XOR39 GO GET CONSTANT 
1385 D066 30S: 
1386 012203 MOV (R2)+,R3 ;GET TEST DATA 
1387 006360 Oe0003 CMP RO, R3 ‘COMPARE WITH CHECK WORD 
1388 O0b.36e 1403 BEQ +10 
1 CLR ~(SP) PUSH FAKE STATUS ON THE STACK 
1390 006366 004767 i72612 ISR PC, ERROR ‘ERROR! MEM DATA (R3) NOT = TEST DATA 
1331 (RO), ADDRESS=(R2)-2 
1393 006372 012203 MOV (R2)+,R3 ;GET TEST DATA 
130849 006374 O20003 CMP RO, R3 ‘COMPARE WITH CHECK WORD 
1395 00676 001403 BEQ +10 
13% OOSO4E CLR ~(SP) PUSH FAKE STATUS ON THE STACK 
1397 006402 004767 172576 ISR PC, ERROR sERR RROR! MEM DATA (R3) NOT = TEST DATA 
1398 , ADDRESS=(R2)-2 
1400 OO640E 012203 MOV (R2)+,R3 site —— DATA 
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1401 006420 CMP RO,R3 COMPARE WITH CHECK WORD 
tas Rpedt§ RFR 11g, PUSH FAKE “STATUS ON THE STACK 
1404 006416 004767 172562 JSR PC, ERROR ‘ERROR! MEM DATA (R3) NOT = TEST DATA 
1405 : (RO), SS=(Re)-2 
1407 006422 012203 MOV (R2)+,R3 iQET TEST DATA 
1903 boEsee DOTNoS sro Pel ee ee ee 
1410 006430 OOSO46 CLR ~(5P) PUSH FAKE STATUS ON THE STAC 
1411 006432 004767 172546 ISR PC, ERROR ; ERROR! MEM DATA (R3) NOT = TEST DATA 
tale (RO), ADORESS=(R2)-2 
1414 008436 012203 MOV (R2)+,R3 ;GET TEST DATA 
1415 OO644O 20003 CMP RO, R3 ‘COMPARE WITH CHECK WORD 
1416 OO06442 001403 +10 
1417 OO6444 OOSO46 CLR -(SP) ;PUSH FAKE STATUS ON THE STAC 
1418 OO6446 004767 172532 JSR PC, ERROR : ERROR! ATA (R3) NOT = TEST DATA 
re Jo ere 
1421 OO64S2 012203 MOV (R2)+,R3 ;GET TEST DATA 
1422 006454 d20003 CMP RO, R3 “COMPARE WITH CHECK WORD 
1 006456 001403 BEQ +10 
1424 006460 O0SO46 CLR ~(SP) PUSH FAKE STATUS ON THE STACK 
1425 O06462 004767 172516 JSR PC, ERROR “ERROR! MEM DATA (R3) NOT = TEST DATA 
14e% (RO), ADORESS=(R2)-2 
1428 006466 012203 MOV (R2)+,R3 ;GET TEST DATA 
1429 006470 020003 CMP RO, R3 ‘COMPARE WITH CHECK WORD 
1430 006472 001403 BEQ +10 
1431 006474 OOSO46 CLR ~(SP) PUSH FAKE STATUS ON THE STACK 
1432 006476 004767 172502 JSR PC, ERROR ‘ERROR! MEM DATA (R3) NOT = TEST DATA 
1433 (RO), ADDRESS=(R2)-2 
1435 006502 012203 (R2)+,R3 :GET TEST DATA 
1436 006504 20003 CMP RO, R3 COMPARE WITH CHECK WORD 
43a reat rer a #10, STATUS ON THE STAC 
1439 006512 004767 172466 ISR PC, ERROR ERROR! MEN DAT ARS) NOT = TEST DATA 
1440 : (RO), ADDRESS= (Re )=-2 
14 
fied Geel Rela os EERE See ht Baur 
te "7 | 
Iyge DOReSS BOTaib 3 
1446 006524 005100 C RO ; COMPLEMENT CHECK WORD 
1447 0065265 005304 DEC RY :DECREMENT BLOCK COUNTER 
1448 006530 001303 BNE 25 
1450 006532 032737 O40000 177570 BIT #40000,a8SWR §;LOOP ON TEST? 
Hee eee GLEE? oomme irecie vos: RV Htep.coum Tyo ap uo Rose 16 Sec 
1453 reed 1 : MOV 4(5P)’ iat g ORTIRG BAN 8 
1468 006554 004767 177134 JSR PC, STAM2 GO SET UP MEM MGMT "IF REQUIRD 
1456 CHECK WORST CASE BIT COMPLEMENT promi 
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1457 006560 005000 CLR RO 
1458 006562 005767 172166 TST ICQUNT ;CHECK IF COMPLEMENT PATERN 
aon . ee § 
1963 poses DOSTE? 1 7bGN + ieee Pea . ‘aor 0 ie CET os tren ie 
ives 10 i i 177402 OER PC. x BOE Coke 
1465 ees p08 60S MOV CRBS AOR ;GET DATA 
1467 006516 $0003 Cre RO R3 ‘CHECK DATA 

bbc" . 
ie Bees eae 
1470 60662 172354 PC, ERROR 
1471 006630 005100 COM RO ;COMPLEMENT CHECK WORD 
1472 006632 005142 COM -(R2) ; COMPLEMENT TEST DATA 
1473 006634 012203 MOV (R2)+,R3 :GET DATA 
1478 BOEENB Serons iin $1 ' 
1476 O06642 CLR ~(SP) PUSH FAKE STATUS ON THE STACK 
1477 006644 004767 172334 ISR PC, ERROR 
1478 006650 005109 Con _ ae ; COMPLEMENT CHECK WORD 
1480 Goes pepe pig DEC RE iB 4 WORD COUNTER 
1481 001350 BNE 6$ 
1482 006662 005100 COM RO ;COMPLEMENT CHECK WORD 
1483 006664 005304 DEC RY :DECREMENT 256. WORD COUNTER 
1484 O06666 001343 BNE S$ 
LHe PEE Te eet 172070 bee f T ibe aren TAC OER COUNTER 
Lig? Speers |= bor aas Bre Gg 
1489 006700 016602 oO0004 MOV 4(SP),R2 ;GET BANK 8 
148) DOETIO bie663 poDDHE ye Ce ST ock ¢ 

teegce 

i4ae 714 pases D4N000 177570 BIT Ga Sasi EOP ON TE GQUNT 
1493 006722 001307 BNE 4O$ : BRANCH IF POOP ON TEST 
1434 006 006367 172024 BSL ICOUNT 
149% 006 heats 177354 IMP 1$ 
1498 Bosses iieps CCCGee fos: pov CRED? RD OOP OE DATA WORD 
1493 744 tee 000020 MOV 20(R2), RY BET aM DATA WORD 
1500 006750 110422 MOVB RY, (Res+ :SWAP WORDS 1-8 
1501 006752 1iptee MOVB Ru, (Re) + {WITH 9-16 
1502 006754 1104 MOVB RY; (Ro) + 
1503 006756 110422 MOVB RY; (Re)+ 
1504 006760 Ligue MOVE RY, (Ro) + 
1505 110422 MOVB RY, (RO)+ 
1506 006764 110422 MOVB RY; (Re)+ 
ioe Bere libs mv Rigas 
1509 bbe tious MOVE Ru! (Rods 
1510 006774 110422 MOVB RY; (Re)+ 
1511 006776 110422 MOVB RY, (Re)+ 
iSie 110422 MOVB RY, (Re)+ 
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1513 007002 110422 MOVE = RY, (R2}+ 
1514 ll R9 SBS 
ie tt i it ;AND VICE VERSA 
18a Gorols it + (RS) 
1519 007016 11002e MOVE =——-RO, (R2)+ 
1S20 007020 110022 MOVB RO, (R2)+ 
0702. bars ° + 
Boos | 11B0ss na FB, 333 
nC 11002¢ , (Re)+ 
110022 MOVB  —-RO, (Re) + 
110022 MOVB RO, (Re) + 
tase Pore 110068 nove RO; (nes 
8 007040 11002e RO; ( )+ 
1529 007042 110022 MOVB RO, (Re) + 
i te me gas 
1 DEC me 
1834 OO70S% | bossc3 Bee OtC# 
1535 007056 001327 BNE 7§ 
1537 007060 005767 171670 TST ICOQUNT 
1538 007064 001402 BEQ 11$ 
1539 007066 000167 177220 IMP 1$ 
1540 007072 012616 11$: MOV (SP)+, (SP) 
1541 007074 012616 MOV (SP}+’ (SP) 
1542 007076 000207 RTS PC 
1S44 ;ROUTINE TO WRITE 8 XOR 13 WORST CASE NOISE TEST PATTERN 
1545 .SBTTL § XOR 13 ROUTINES 
1546 ;CALL: MOV BANK #,-(SP) 
1547 : MOV #4KBANKS, - (SP) 
1548 : JSR PC, .8X13 
1850 907 100 012616 8X13: MOV (SP 4, (SP) ;ADJUST STACK 
isée 007104 Aageos ays , 
1554 ; ROUTINE TO CHECK 8 XOR 13 WORST CASE NOISE TEST PATTERN 
1556 > MOV BANKS, -(SP) ;PUSH FIRST BANK # ON THE STACK 
1557 : MOV #BANKS,-(SP) | ;PUSH # OF 4K BANKS TO CHECK ON THE STACK 
1558 : JSR PC,..8X13 CALL ROUTINE 
1 106 012616 ..8X13: MOV (SP)+, (SP) 
ie borlie oisele NOY (SP ds7 8) 
15be 007112 000207 RTS PC ; RETURN 
1564 -SBTTL ROTATING 1'S 8 0's ROUTINES 
1565 ;ROUTINE TO CHECK ROTATING 0’ BIT THROUGH FILD OF 1’S 
1566 CALL: MOV 8,-(SP SET STARTING BANK ® 
1567 : MOV BLKCNT -(SP)  ;SET 256. WORD BLOCK COUNT 
1568 : JSR , ROTO ;CALL ROUI TNE 
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1569 


pa he 


VERS 


Dinwn 


SESE Sis 


eb 


SaRaRRenE 
ae 


be 
wu 
0 
a 


minininininth th 
BESFRL56 


SeeRREBRER 


a) Soe mle Os 


1610 


007114 


ae 


007134 
007140 


bh bb 


INR EROR 


a3 Ee 


ies 


000276 


-ROTO: JSR PC, CKSWR 
He 
MOV #-1,RO 
1s: HOY 8256. ,RS 
: Se PC, ROTATE 
MOV -2tR2),R3 
BCS 3$ 
CMP RO,R3 
BEQ 4§ 
33: CLR -(SP) 
JSR PC, ERROR 
4§: pee RS 
Bre Ot«ORS 
BNE 1$ 
MOV (SP)+, (SP) 
MOV (SP)+) (SP) 
RTS PC 
;ROUTINE TO CHECK ROTATING 
CALL: MOV BANK#. -(SP) 
; MOV BLKCNT, -(SP) 
: ISR PC, .ROTL 
.ROT1: JSR PC, CKSWR 
MOV 2(SP),R4 
MOV 4(5P)’Re 
JSR PC, STAM2 
CLR RO 
1S: MOV #256. ,RS 
2g: SEC 
ISR PC, ROTATE 
MOV -2tR2),R3 
BCC 3$ 
CMP RO, R3 
BEQ +4 
3S: HLT 
DEC RS 
BNE 2s 
DEC RY 
RY Hove cge 
MOV (3p }%" (ep) 
RTS PC 
“ROUTINE TO ROTATE ’ 
ROTATE: ROLB (Re) 
ROLB = (Re) 
ROLB 3s (R2) 


‘eee 
; MGMT (IF AVAIL) 
;SET CHECK WORD 


;SET 256. WORD COUNT 
;CLEAR CARRY BIT IN PSW 


;GET RESULT 
;BRANCH IF °C’ BiT WAS SET 
;CHECK RESULT 


: * COULD NOT ROTATE ’0’ BIT 
ioe ee 
eet re 

N . WORD BLOCK COUNT 
bop CONSTANTS © OFF THE STACK 


;RETURN TO CALLER 


*1’ BIT THROUGH A FIELD OF 0’S 


SET STARTING a 
8 OF 256. 


te 


eB 
a 
2 
£ 


TCHES 
; OF - WORD BLOCKS TO CHECK 
;GET STARTING BANK 8 


160 SRT Sr Mane (IF AVAIL) 


BET SRP ath tncpou 

'30 ROTATE '1’ BIT 

;GET RE’ 

IBRANCH IF °C’ IS CLEAR 

{CHECK RESULT 

sERROR! COULD NOT ROTATE "1" BIT 
Tenor 8 DRESS TN Re 


;DECREMENT 256. WORD BLOCK COUNT 
;ADJUST RETURN ADDRESS 
;RETURN TO CALLER 


C’ BIT THROUGH A MEMORY LOCATION. 
} (R2)=] OR 1 


: z 
:(Ro)s1 OR 
;(R2)=177773 OR 000004 


WORD BLOCKS TO CHECK 
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;DECREMENT BLOCK COUNT 


OT ARTING 
WORD 
CALL ROUTINE 
ona? 
ITE 866 
ERROR COUNT INTO 
Rel 
I 
CH 
;LOAD ERROR COUNT 
THE 
IT 
SW1l 
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= giz 


PA 
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TCH 
LOAD 
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ISP 
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abSwR 
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BEQ .+6 
sess 171236 CLR icount ;ICOUNT =O40000 IF SW11 =1 
o0so aera ODE 

15 ou7ses 051040 RESLDR: .ASCIZ <1S><12>’TO RESTORE LOADERS START AT 162’<15><12> 
1 2522 

0755 l Sune 

07554 14 1 1101 PARITY: .ASCIZ <15><12> "ENABLE PARITY? 1/0=YES/NO ’ 
1693 14 10 
16% 
3 14 ll . 
1697 007621 O15 OS51412 O40S24 STBANK: .ASCIZ <15><12>’STARTING BANK #(8)? ° 
1698 007626 1 7111 107 
Ses ie et 
1701 ; 1? BANKS: .ASCIZ <15><12>’# OF 4K BANKS TO TEST(8)? ’ 
1702 007656 ll 
1703 007664 045516 020123 047524 
ae a 
1 0 12 101 PAT ASCIZ <15><12>’PATTERN #? ’ 
ie teris Bites Oye Hine 

QUEST: .ASCIZ <15><1l2>’?’ 

110 ee ols t osol3t CONST: “Beets <15><12>" TYPE CONSTANT’ 
1711 920105 isi6 
1712 007742 116 000 
1713 007747 9 1 116 PRG3M: .ASCIZ <15><12>’ INPUT # OF 256. WORD BLOCKS TO TEST INSTEAD OF 
171 Oorres { 
171 ill i 
1717 007776 1 1517 051513 
1719 Dibble beeies BaNIHO beies 
1760 010025 4 042101 apart 
1722 610058 005015 OS4S24 042520 PRGYM: .ASCIZ <15><12>’TYPE ADDRESS’ 
723 01006 : 042104 O4eSe2 
1725 oioo%7 12 O20117 RELOCM: .ASCIZ <15><12>’TO RESTORE PROGRAM START AT ’ 
tre Sites Oe Gries Riel 
1728 61000 ives 020115 052123 
1729 010078 1101 G20i24 052101 
iat rst o000s2 ASTERISK asclz ry? 
1 ot 11 1 O1 ENDMSG: .ASCIZ ’DEMJA DONE!’ 
1735 Biblie oNseoy uBete Benda! 
1734 EVEN 
1735 
1736 ;ROUTINE TO RELOCATE PROGRAM BACK TO 0 
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; DISABLE 
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pensTe Pt 1 1092 1145 
Mt els 5S 
PFVEC = a # 247% 599# 600# 
PIRQ = a 
PIRVEC= 658 
PKMN os 488 
PLACE S698 886 
PONE 4 1638 1748 
PRG3M 17138 
PRGHM 10030 17228 
| PRTYY = | 
| PRTY?7 = 438 150 
PSM = 010000 ugg 
PSH = 708 
, PTWO 168 1688 
wm 232, 268 
JUUS /E 
PWRFAI 000730 253 2s78 
QUEST 007723 17098 
RANTST 003716 8708 
RECDAT 001514 38S 4078 
REG = O04000 Sls 
a a ne 
aa 4 ae 5sl 416 417 462 463 $96 38s 1110 1746# 
10047 1 1 ® 
Sa i ne 
3 
REStOR OO7SS0 ieee 
RESVEC= 000010 Se 
ROTATE 007276 1578 1606 lé2ee8 
004070 t 
ROT1 004 9198 
Rid 1248 876 1225 1226 1229 1274 1275 
SAVPCe lle 1618 
SAVRO 004710 10228 1023 10678 
| SAVRI OON71le 10688 
SAVRe 004714 10698 
| SAVRS 004716 10708 
SAVRY 004720 10718 
' SAVRS O047e2 10728 
SCOPE = 104000 1218 
SLR = 177774 71ie8 
EA "' sees 1 1 
aaa = agate 9S8 ie 13s 426 607% 233% 12418 le42e 12508 1253% 1279% 1288 
fe = iver ars 210 1 1249 1287 
= 
i ee 
| START1 OO2440 S84 5928 59S 953 
STBHNK ress 16978 
_ STKPTR= 7 ses S32 628 661 800 816 829 846 8S4 304 932 1050 
STMM2 005714 12588 1298 1374 ern) 1490 1573 1601 1649 
SWR = 177570 738 328 353 358 362 390 394 604 1094 1101 1175 1450 1492 
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STYPE “8 
- ABS. 010200 000 


ERRORS DETECTED: 0 
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